home *** CD-ROM | disk | FTP | other *** search
/ Nebula 2 / Nebula Two.iso / SourceCode / MiniExamples / IndexingKit / RecordManager / DataRecord.m < prev    next >
Text File  |  1995-06-12  |  929b  |  65 lines
  1. /* DataRecord.m:
  2.  * You may freely copy, distribute, and reuse the code in this example.
  3.  * NeXT disclaims any warranty of any kind, expressed or  implied, as to its
  4.  * fitness for any particular use.
  5.  *
  6.  */
  7.  
  8. #import "DataRecord.h"
  9.  
  10. @implementation DataRecord
  11.  
  12. - init
  13. {
  14.     aString = NULL;
  15.     anInt = 0;
  16.     return self;
  17. }
  18.  
  19. - free
  20. {
  21.     if(aString) free(aString);
  22.     return [super free];
  23. }
  24.  
  25. - setAString:(const char *)str
  26. {
  27.     if(aString) free(aString);
  28.     aString = NXCopyStringBuffer(str);
  29.     return self;
  30. }
  31.  
  32. - (const char *)aString
  33. {
  34.     return aString;
  35. }
  36.  
  37. - setAnInt:(int)number
  38. {
  39.     anInt = number;
  40.     return self;
  41. }
  42.  
  43. - (int)anInt;
  44. {
  45.     return anInt;
  46. }
  47.  
  48. - write:(NXTypedStream *)stream
  49. {
  50.     [super write:stream];
  51.     NXWriteTypes(stream,"*i", &aString, &anInt);
  52.     return self;
  53. }
  54.  
  55. - read:(NXTypedStream *)stream
  56. {
  57.     [super read:stream];
  58.     NXReadTypes(stream,"*i", &aString, &anInt);
  59.     return self;
  60. }
  61.  
  62. @end
  63.  
  64.  
  65.